object FPubF: TFPubF
  Left = 0
  Top = 362
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Publishing menu'
  ClientHeight = 71
  ClientWidth = 632
  Color = clBlue
  Font.Color = clWhite
  Font.Height = -16
  Font.Name = 'MS Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 19
  object SaveB: TSpeedButton
    Left = 128
    Top = 8
    Width = 113
    Height = 25
    Hint = 'Save'
    Caption = '&Save'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
      7700333333337777777733333333008088003333333377F73377333333330088
      88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
      000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
      FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
      99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
      99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
      99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
      93337FFFF7737777733300000033333333337777773333333333}
    NumGlyphs = 2
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    OnClick = SaveBClick
  end
  object PrintB: TSpeedButton
    Left = 8
    Top = 40
    Width = 113
    Height = 25
    Hint = 'Print'
    AllowAllUp = True
    GroupIndex = 1
    Caption = '&Print'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
      8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
      8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
      8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
      03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
      03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
      33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
      33333337FFFF7733333333300000033333333337777773333333}
    NumGlyphs = 2
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    OnClick = PrintBClick
  end
  object WordB: TSpeedButton
    Left = 128
    Top = 40
    Width = 113
    Height = 25
    Hint = 'Move your paragraph to a word processor'
    Caption = '&Word Processor'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      003337777777777777F330FFFFFFFFFFF033373F3F3F3F3F3733330F0F0F0F0F
      03333F7F737373737FFF0000FFFFFFF0000377773FFFFFF7777F0FF800000008
      FF037F3F77777773FF7F0F9FFFFFFFF000037F7333333337777F0FFFFFFFFFFF
      FF0373FFFFFFFFFFFF7330000000000000333777777777777733333000000000
      3333333777777777F3333330FFFFFFF033333337F3FFFFF7F3333330F00000F0
      33333337F77777F7F3333330F0AAE0F033333337F7F337F7F3333330F0DAD0F0
      33333337F7FFF7F7F3333330F00000F033333337F7777737F3333330FFFFFFF0
      33333337FFFFFFF7F333333000000000333333377777777733330000}
    NumGlyphs = 2
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    OnClick = WordBClick
  end
  object ReviewB: TSpeedButton
    Left = 8
    Top = 8
    Width = 113
    Height = 25
    Caption = '&Review'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
      3333333777333777FF33339993707399933333773337F3777FF3399933000339
      9933377333777F3377F3399333707333993337733337333337FF993333333333
      399377F33333F333377F993333303333399377F33337FF333373993333707333
      333377F333777F333333993333101333333377F333777F3FFFFF993333000399
      999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
      99933773FF777F3F777F339993707399999333773F373F77777F333999999999
      3393333777333777337333333999993333333333377777333333}
    NumGlyphs = 2
    ParentFont = False
    ParentShowHint = False
    ShowHint = False
    OnClick = ReviewBClick
  end
  object NewPB: TSpeedButton
    Left = 248
    Top = 8
    Width = 113
    Height = 25
    Hint = 'Start a new topic'
    Caption = '&New Topic'
    Enabled = False
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
      333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
      0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
      07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
      07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
      0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
      33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
      B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
      3BB33773333773333773B333333B3333333B7333333733333337}
    NumGlyphs = 2
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    OnClick = NewPBClick
  end
  object HelpB: TSpeedButton
    Left = 248
    Top = 40
    Width = 113
    Height = 25
    Hint = 'Print'
    Caption = '&Help'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000000000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333332233
      3333333333333FF3333333330000333333324423333333333333388F33333333
      00003333333A22433333333333338F38F3333333000033333333A22333333333
      33338FF8F3333333000033333333333333333333333338833333333300003333
      3333446333333333333333FF3333333300003333333222433333333333333888
      F333333300003333333A22433333333333338F38F333333300003333333A2224
      3333333333338F38F3333333000033333333A2224333333333338F338F333333
      0000333333333A2224333333333338F338F3333300003333344333A222433333
      333F338F338F3333000033332224333A224333333388F338F338F33300003333
      A22244422243333338F38FFF8338F333000033333A2222222223333338F33888
      3338F3330000333333AA222222333333338FF33333383333000033333333AAAA
      A333333333388FFFFF8333330000333333333333333333333333388888333333
      0000}
    NumGlyphs = 2
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    OnClick = HelpBClick
  end
  object Image1: TImage
    Left = 488
    Top = 0
    Width = 82
    Height = 58
    Picture.Data = {<image000.bmp>}
    Visible = False
  end
  object SpellB: TSpeedButton
    Left = 368
    Top = 24
    Width = 113
    Height = 25
    Hint = 'Spell check your paragraph'
    Caption = 'Spell &check'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003FF999903333
      333333377777FFF33333FF9FFFF9993333333F7F3FF7773FF333009F00F03399
      3333777F7737FF773F33FF9FFFF9933393333F73FFF7733373F300F999903333
      393377377777F33337F3FFFFFFF0333339333FF33337F333373300FFFFF03333
      93337733FFF7F3337333FFF00000333333333F377777FF33FF330FF0FF999339
      93337337F3777FF77F33FFF0F993993993333337F77377F77F33FFF003339939
      93333337733F77377FFFFFF03399933999933FF733777337777F000339933339
      93997773377F3FF77F7733333993993993993333377F77377F77333333999339
      99933333337773377773333333333333333333333333333333330000}
    NumGlyphs = 2
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    OnClick = SpellBClick
  end
  object PrintDialog1: TPrintDialog
    Left = 568
  end
  object SaveDialog1: TSaveDialog
    FileEditStyle = fsEdit
    Options = [ofOverwritePrompt]
    Left = 600
  end
  object ImageList1: TImageList
    DrawingStyle = dsTransparent
    Height = 58
    Width = 82
    Left = 536
  end
  object StarT: TTimer
    Interval = 500
    OnTimer = StarTTimer
    Left = 504
  end
end